home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-04
/
simcode.zip
/
EXASCS3.SCS
< prev
next >
Wrap
Text File
|
1992-11-05
|
2KB
|
25 lines
┌─────────────────────────────────────────────────────────────────────────────┐
│#What is your Name # ~GET A~ Prompt for user name, then store to A. │
│@ │
│#What is your Age # ~GET B~ Prompt for user age, then store to B. │
│@ │
│#What is your City # ~GET Z~ Prompt for user city, then store to Z. │
│@ │
│@ │
│~GREEN~ │
│#Your name is # ~USE A~ Display your name is and return A. │
│@ │
│#Your age is # ~USE B~ Display your age is and return B. │
│@ │
│#Your City is # ~USE Z~ Display your city is and return Z. │
│@ │
│@ │
│@ │
│~OPEN DATABASE.DAT~ │
│~APPEND A~ │
│~APPEND B~ │
│~APPEND Z~ │
│~PRINT A~ ~PRINT B~ ~PRINT Z~ │
└─────────────────────────────────────────────────────────────────────────────┘